<Query Kind="VBStatements">
  <Connection>
    <ID>a50d59f2-50a7-4e3c-b893-7b7c3ce076e7</ID>
    <Server>WEBSQL</Server>
    <Database>abpc</Database>
    <ShowServer>true</ShowServer>
  </Connection>
</Query>

Dim x(2) as Integer
x.Dump("Create a blank array of Integers")
x(0) = 5 ' Change the first cell
x(2) = 123 ' Change the last cell
x.Dump("You can modify the cells in an array")

x = New Integer(4) {}
x.Dump("Let's clear the array and replace it with a new one with 5 cells")
x = New Integer(2) { 23, 44, 88 }
x.Dump("Let's not tell it how big the array is")
x = New Integer() { 23, 44 }
x.Dump("Let's not tell it how big the array is")

Dim y = New Integer(5) {}
y.Dump("Let's declare a NEW variable (y) and use type inferencing.")
